home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 11 / FM Towns Free Software Collection 11.iso / t_os / data / nos / modem.plp < prev    next >
Text File  |  1995-03-18  |  8KB  |  226 lines

  1. %setAT    {
  2.     var type[10];
  3.     SNDMSG({erande.snd});
  4.     type:=
  5.     @select({モデムのタイプは?},
  6.         ,{im({1200n})},
  7.         { 1200                   MNPなし },{im({1200n})},
  8.         { 2400                   MNPなし },{im({2400n})},
  9.         { 2400(端末速度2400)     MNPあり },{im({2400m})},
  10.         { 2400(端末速度4800)     MNPあり },{im({4800m})});
  11.     SNDMSG({nyuryoku.snd});
  12.     footnote({ATコマンドを直接指定してネ☆});
  13.     %a @input({ATコマンドを設定して下さい( 例:ATDPX3\N3\V1\Q3\J0)},,
  14.             {AT}|@head(MODEM,{/}));
  15.     case    (a <> {},{Yes},
  16.         {case    (@getchar(a,1,2),{AT},
  17.             {case(a=@head(a,{\}),{Yes},
  18.                 {MODEM:=@getchar(a,3,999)|{/}|
  19.                     @getchar(a,3,999)|{/AT直接指定_}|type;},                ,{MODEM:=@getchar(a,3,999)|{/}|
  20.                     {/AT直接指定_}|type;})});
  21.         },{No},{setAT});
  22.     };
  23.  
  24. %FUJITSU{
  25.     SNDMSG({erande.snd});
  26.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  27.     ,,
  28.  
  29.     { 富士通 内蔵1200 },    {MODEM:={X3//内蔵1200_1200n}},
  30.     { 富士通 内蔵2400 },    {MODEM:={X3/\N3\V1\Q3\J0%C0/内蔵2400_9600m}},
  31.     { 富士通 PM1200F  },    {MODEM:={X3//PM1200F_1200n}},
  32.     { 富士通 PM2400F  },    {MODEM:={X3/\N3\V1\Q2\J0%C0/PM2400F_9600m}},
  33.     { 富士通 PM2400FII},    {MODEM:={X3/\N7\V2\Q2\J0%C0/PM2400FII_9600m}},
  34.     { 富士通 OAMD-301 },    {MODEM:={X3&D2/\N3\V2\Q2\J0/OAMD-301_9600m}},
  35.     { 富士通 FMM-CM301 },    {MODEM:={X3/\N3\V1\Q3\J0%C0/ICモデム2400_9600m}},
  36.     { ATコマンド直設定 },    {setAT}
  37.     )};
  38.  
  39. %AIWA    {
  40.     SNDMSG({erande.snd});
  41.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  42.     ,,
  43.     { AIWA PV-A1200 },    {MODEM:={X3//PV-A1200_1200n}},
  44.     { AIWA PV-A2400 },    {MODEM:={X3&D2/&S1&C1/PV-A2400_2400n}},
  45.     { AIWA PV-A2400MNP4},    {MODEM:={&D2/&M4\Q1/PV-A2400MNP4_9600m}},
  46.     { AIWA PV-M12 },    {MODEM:={X3/\N3\Q3\J0\V1/PV-M12_1200n}},
  47.     { AIWA PV-M24 },    {MODEM:={X3&D2/\N3\Q3\J0\V2/PV-M24_9600m}},
  48.     { AIWA PV-M24M5},    {MODEM:={X3&D2/\N3\Q3\J0\V2/PV-M24M5_9600m}},
  49.     { AIWA PV-M24B5},    {MODEM:={X3&D2/\N3\Q3\J0\V2%C0/PV-M24B5_9600m}},
  50.     { AIWA PV-M24VM5},    {MODEM:={X3&D2/\N3\Q3\J0\V2%C0/PV-M24_9600m}},
  51.     { AIWA PV-A24MNP5},    {MODEM:={X3&D2/\N3\Q3\J0%C0/PV-A24MNP5_9600m}},
  52.     { AIWA PV-A24V42 },    {MODEM:={X3&D2/\N3\Q3\J0/PV-A24V42_9600m}},
  53.     { AIWA PV-A96V5},    {MODEM:={X3&D2/\N3\Q3\J0\V2%C0/PV-A96V5_9600m}},
  54.     { AIWA PV-AF144V5},
  55.     {MODEM:={X4B2&D2/\N3\Q3\J0\V2%C0S91=13/PV-AF144V5_14400m}},
  56.     { ATコマンド直設定 },    {setAT}
  57.     )};
  58.  
  59. %EPSON    {
  60.     SNDMSG({erande.snd});
  61.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  62.     ,,
  63.     { EPSON SR-120S },    {MODEM:={X3//SR-120S_1200n}},
  64.     { EPSON SR-240S },    {MODEM:={X3//SR-120S_1200n}},
  65.     { EPSON SR-120AT},    {MODEM:={X3/B1/SR-120S_1200n}},
  66.     { EPSON SR-240AT},    {MODEM:={X3//SR-240AT_2400n}},
  67.     { EPSON SR-240V },    {MODEM:={X3\V2/N1&K1%C0/SR-240V_9600m}},
  68.     {},{},
  69.     { ATコマンド直設定 },    {setAT}
  70.     )};
  71.  
  72. %OMRON    {
  73.     SNDMSG({erande.snd});
  74.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  75.     ,,
  76.     { OMRON MD1200},    {MODEM:={X3//MD1200_1200n}},
  77.     { OMRON MD12FS},    {MODEM:={X3//MD12FS_1200n}},
  78.     { OMRON MD2400A},    {MODEM:={X3/\N3\V1\Q2\J0/MD2400A_2400m}},
  79.     { OMRON MD2400F},    {MODEM:={X3/\N3\V2\Q2\J0/MD2400F_2400m}},
  80.     { OMRON MD24FB5V},    {MODEM:={X3/\N3\Q2\J0\V2%C0/MD24FB5V_9600m}},
  81.     { OMRON MD24FP4},    {MODEM:={X3/\N3\Q2\J0/MD24FP4_2400m}},
  82.     { OMRON MD24FP4II},    {MODEM:={X3&P2/\N3\Q2\J0/MD24FP4II_9600m}},
  83.     { OMRON MD24FP5V},    {MODEM:={X3/\N3\Q2\J0\V2%C0/MD24FP5V_9600m}},
  84.     { OMRON MD24FS4},    {MODEM:={X3/\N3\Q2\J0/MD24FS4_2400m}},
  85.     { OMRON MD24FS5},    {MODEM:={X3/\N3\Q2\J0/MD24FS5_2400m}},
  86.     { OMRON MD24FN5},    {MODEM:={X3/\N3\Q2\J0\V2/MD24FS4_2400m}},
  87.     { OMRON MD24FS7},    {MODEM:={X3/\N3\Q2\J0\V2/MD24FS7_2400m}},
  88.     { OMRON MD96FB5V},    {MODEM:={X3/\N3\Q2%C0\D0\J0/MD96FB5V_9600m}},
  89.     { OMRON MD96FL10V},    {MODEM:={X3/\N3\Q2%C0\J0/MD96FL10V_19200m}},
  90.     { OMRON MD96XL10V},    {MODEM:={X3/\N3\Q2%C0\J0/MD96XL10V_19200m}},
  91.     { OMRON MD96XT10V},    {MODEM:={X3/\N3\Q2%C0\J0/MD96XT10V_19200m}},
  92.     { OMRON MD96FB5V},
  93.     {MODEM:={X3&E0/\N3&M5*C1\D0\J0\V1/MD96FB5V_9600m}},
  94.     { OMRON MD96FS5},
  95.     {MODEM:={X3&E0/\N3&M5*C1\D0\J0\V1/MD96FS5_9600m}},
  96.     { OMRON MD144XT10V},    {MODEM:={X3/\N3\Q2%C0\J0/MD144XT10V_19200m}},
  97.     {},{},
  98.     { ATコマンド直設定 },    {setAT}
  99.     )};
  100.  
  101. %INTEGRAN{
  102.     SNDMSG({erande.snd});
  103.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  104.     ,,
  105.     { INTEGRAN 通信POCO },{MODEM:={X3/\V1%C0/INTEGURAN_9600m}},
  106.     { 通信POCO(端末固定)},{MODEM:={X3/\N3\J0\V1%C0/INTEGRAN_9600m}},
  107.     { ATコマンド直設定  },    {setAT}
  108.     )};
  109.  
  110. %OKI{
  111.     SNDMSG({erande.snd});
  112.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  113.     ,,
  114.     { PCLINK224/V42.bis },{MODEM:={X3/\N3\J0\V1&E0W2/PCLINK224_9600m}},
  115.     { PCLINK296/V42.bis },{MODEM:={X3/\N3\J0\V1&E0W2/PCLINK296_9600m}},
  116.     { ATコマンド直設定  },    {setAT}
  117.     )};
  118.  
  119. %NEC    {
  120.     SNDMSG({erande.snd});
  121.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  122.     ,,
  123.     {NEC COMSTAR   1212AT},{MODEM:={X/&C1/COMSTAR 1212AT_1200n}},
  124.     {NEC COMSTARZ CULB 24/4},{MODEM:={X3/\V1%X0/COMSTAR CULB 24-4_2400m}},
  125.     {NEC COMSTARZ  2424/4},{MODEM:={X3/\V1%X0/COMSTAR 2424-4_2400m}},
  126.     {NEC COMSTARZ  2424/5},{MODEM:={X3/\V1%X0/COMSTAR 2424-5_2400m}},
  127.     {NEC COMSTAR 2424AT/4},
  128.     {MODEM:={X3/Q4\T5&D2&G0&S0/COMSTAR 2424AT4_2400m}},
  129.     {NEC COMSTAR 2424AT/5},
  130.     {MODEM:={X3/Q4\T5&D2&G0&S0/COMSTAR 2424AT5_2400m}},
  131.     {  ATコマンド直設定  },{setAT}
  132.     )};
  133.  
  134. %SONY    {
  135.     SNDMSG({erande.snd});
  136.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  137.     ,,
  138.     { SONY IT-V1200  },    {MODEM:={X3//IT-V1200_1200n}},
  139.     { SONY IT-V2400  },    {MODEM:={X3//IT-V2400_2400m}},
  140.     { ATコマンド直設定 },{setAT}
  141.     )};
  142.  
  143. %MICROCORE{
  144.     SNDMSG({erande.snd});
  145.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  146.     ,,
  147.     { MICROCORE MC24PA5 },{MODEM:={X3/\N3\Q2\J0\X1%C0/MC24PA5_9600m}},
  148.     {},{},
  149.     { ATコマンド直設定  },{setAT}
  150.     )};
  151.  
  152. %PROSIDE{
  153.     SNDMSG({erande.snd});
  154.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  155.     ,,
  156.     { PROSIDE PS-1414VQE },
  157.     {MODEM:={X3L1&D2/N1W1&K3&P3\A3\N3%C0/PS1414VQE_9600m}},
  158.     {},{},
  159.     { ATコマンド直設定  },{setAT}
  160.     )};
  161.  
  162. %SUNTAC{
  163.     SNDMSG({erande.snd});
  164.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  165.     ,,
  166.     {  SUNTAC MS144AVF  },
  167.     {MODEM:={X3/\N3\C1\V2\Q2\J0\X0%C0/MS144AVF_19200m}},
  168.     {},{},
  169.     { ATコマンド直設定  },{setAT}
  170.     )};
  171.  
  172. %DYNALINK{
  173.     SNDMSG({erande.snd});
  174.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  175.     ,,
  176.     {DYNALINK 1414VE},
  177.         {MODEM:={X3&D2/N1W1&K3&P2\A3\N2S95=46/DYNALINK1414VE_9600m}},
  178.     {},{},
  179.     { ATコマンド直設定  },{setAT}
  180.     )};
  181.  
  182. %BOCA{
  183.     SNDMSG({erande.snd});
  184.     select({モデムの機種を選んでネ☆  現在は『}|@modem|{』},
  185.     ,,
  186.     {BOCA RESEARCH M144JE},{MODEM:={X3/&K3&P3\J0\A3\N2/M144JE_9600m}},
  187.     {},{},
  188.     { ATコマンド直設定  },{setAT}
  189.     )};
  190.  
  191. %NISSEI    {
  192.     SNDMSG({erande.snd});footnote({モデムの機種を選んで下さい});
  193.     select({モデムの機種を選んで下さい  現在は「}|@modem|{」です},
  194.     ,,
  195.     {NISSEI FM9624},
  196.     {MODEM:={X3/\N3\Q3%C0/FM9624_9600m}},
  197.     {},{},
  198.     {ATコマンド直設定 },{setAT},
  199.     )};
  200.  
  201. %setMODEM{
  202.     %modem    {case(MODEM,{},{im({未設定})},,{head(@tail(MODEM,{/}),{_})})};
  203.     SNDMSG({erande.snd});
  204.     footnote({モデム・メーカー選択処理中,,,♪});
  205.     select({モデム・メーカーを選んでネ☆},
  206.     ,,
  207.     {  FUJITSU  },{FUJITSU},    {     AIWA     },{AIWA},
  208.     {    OMRON    },{OMRON},    {    EPSON    },{EPSON},
  209.     {      NEC      },{NEC},    {     SONY     },{SONY},
  210.     {   マイクロコア   },{MICROCORE},{      OKI     },{OKI},
  211.     {   インテグラン   },{INTEGRAN},{    プロサイド    },{PROSIDE},
  212.     { DYNALINK },{DYNALINK},{     BOCA     },{BOCA},
  213.     {    日成 電機     },{NISSEI},    {   SUNTAC   },{SUNTAC},
  214.     { ATコマンド直設定 },{setAT}
  215.     )};
  216.  
  217. %setMDM    {
  218.     %modem    {
  219.         case    (MODEM,
  220.             {},{im({未設定})},
  221.             ,{head(@tail(MODEM,{/}),{_})}
  222.             );
  223.         };
  224.     };
  225. setMODEM;
  226.